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SECTION  1 . INTRODUCTICN 

1.1  Purpose  of  the  Validation  Summary  Report 

The  purpose  of  the  Validation  Summary  Report  (VSR)  is  to  identify  individual 
COBOL  language  elements  whose  implementation  does  not  conform  to  American 
National  Standard  Programming  Language  COBOL,  X?. 23-197*1,  and  to  Federal  Stan- 
dard COBOL  as  adopted  from  the  American  National  Standard  by  Federal  Information 
Processing  Standard  21-1  (FIPS  PUB  21-1). 

1.2  Preparation  of  the  VSR 

The  Validation  Summary  Report  is  prepared  by  analyzing  the  results  of  running 
the  COBOL  Compiler  Validation  System  (CCVS).  The  COBOL  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  Federal  Standard  CCBCL, 
their  related  da.ta,  and  an  executive  routine  (VP-routine)  v/hich  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a COBOL  program  v/hich 
includes  many  tests  and  supporting  procedures  indicating  the  result  of  the 
tests . 

The  testing  of  a compiler  in  a particular  hardware/operatinp  system  environment 
is  accomplished  by  compiling  and  executing  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  in 
the  routine.  If  the  compiler  rejects  some  language  elements  by  terminating 
compilation,  giving  fatal  diagnostic  messages,  or  terminating  execution  abnor- 
mally, then  the  test  containing  the  code  the  compiler  was  unable  to  process  is 
deleted  and  the  audit  routine  compilation  and  execution  repeated. 

The  compilation  listings  and  the  output  reports  of  the  audit  routines  con- 
stitute the  raw  data  from  which  the  members  of  the  Federal  COBOL  Compiler 
Testing  Service  produce  a Validation  Summary  Report. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  the  contents  of 
which  are  described  below. 

a.  Section  2 summarizer  "he  results  of  the  compilation  and  execution 
of  the  programs  comprisinpt  the  COBOL  Compiler  Validation  .System.  Section  2 

is  subdivided  into  a subsection  representing  each  level  of  each  module  defined 
in  American  National  Standard  Programming  Language  COBOL,  X3. 23-197**.  Each 
subsection  contains  a list  of  all  of  the  language  elements  which  must  be 
implemented  in  order  to  claim  support  of  that  level/module . The  list  of 
language  elements  will  be  annotated  to  include  a description  of  both  syntax 
and  semantic  errors  detected  during  the  validation. 

b.  Section  3 - FIPS  PUP  21-1  defines  four  Federal  levels  of  the  COBOL 
Standard.  Section  3.1  of  the  VSR  lists  the  discrepancies  described  in  Section  2 
by  the  Federal  level  in  which  the  problem  occurs.  Section  3*2  lists  discrepan- 
cies for  the  Report  Writer  Module,  which  is  not  a part  of  Federal  Standard 
COBOL . 

c.  Section  **  contains  information  which  describes  the  software  environ- 
ment in  which  the  compiler  was  tested.  This  includes  the  name  and  version  of 
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the  operating  system;  the  implementor-namr s which  were  used  in  the  Environment 
Division  of  the  programs  comprising  the  CCVS;  the  options  used  with  the  com- 
piler; and  if  applicable,  information  regarding  the  use  of  compiler  optimiza- 
tion features. 

d.  Section  5 contains  the  results  of  the  ASCII  validation.  The  purpose 
of  these  tests  is  to  ascertain  whether  magnetic  tapes  written  in  ASCII  code  and 
with  ANSI  standard  labels,  and  card  decks  with  ASCII  code,  can  be  transported 
between  the  system  being  validated  and  a foreign  computer  system. 

e.  Appendix  A is  the  Validation  Summary  Working  Document,  a working 
paper  resulting  from  the  compilation  and  execution  of  the  CCVS,  and  from  which 
the  VSR  is  derived. 

1.M  Abstract  Covering  Compliance  to  AKS  COBOL 

Definition  of  an  Implementation  of  American  National  Standard  Programming 
Language  COBOL  (excerpts  from  X3.23-197^<,  Chapter  1,  Section  1.5). 

An  implementation  is  defined  to  meet  the  requirements  of  the  American 
National  Standard  COBOL  specification  if  that  implementation  includes  a 
fully  implemented  specified  level  of  each  of  the  functional  processing 
modules  and  of  the  Nucleus  as  defined  in  this  Standard.  It  follows  from 
this  that,  in  order  to  meet  the  requirements  of  this  Standard,  an  imple- 
mentation must: 

a.  Not  require  the  inclusion  of  substitute  or  additional  language  ele- 
ments in  the  source  program,  in  order  to  accomplish  any  part  of  the  function 
of  any  of  the  standard  language  elements. 

b.  Accept  all  standard  language  elements  contained  in  a given  level 
of  a module  which  is  specified  as  being  included  in  the  implementation, 
except  as  specifically  exempted  (as  pertaining  to  specific  hardware  components 
for  which  support  is  not  claimed).  See  "Elements  that  Pertain  to  Specific 
Hardware  Components"  below. 

These  points  arc  of  particular  pertinence  in  tw’o  areas: 

(1)  There  are  throughout  the  American  National  Standard  COBOL 
specification  certain  language  elements  whose  syntax,  or  effect,  is  specified 
to  be,  in  part,  implementor-defined.  While  the  implementor  specifies  the 
constraints  on  that  portion  of  each  element’s  syntax  or  rules  that  is  indi- 
cated in  this  Standard  to  be  implementor-defined,  such  constraints  may  not 
include  any  requirement  for  the  inclusion  in  the  source  program  of  sub- 
stitute or  additional  language  elements. 

(2)  When  a function  is  provided  outside  the  source  program  that 
accomplishes  a function  specified  by  any  particular  standard  COBOL  element, 
then  the  implementation  must  not  require,  except  for  Environment  Division 
elements,  the  specification  of  that  external  function  in  place  of  or  in 
addition  to  that  standard  language  element: 

The  following  qualifications  apply  to  the  American  National  Standard  COBOL 
specification: 

a.  There  are  certain  language  elements  which  pertain  to  specific  types 
of  hardware  components.  In  order  for  an  implementation  to  meet  the  require- 
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incnts  of  this  standard,  the  implementor  must  specify  the  minimum  hardvare 
configuration  required  for  that  implementation  and  the  hardware  components 
that  it  supports.  Further,  when  support  is  thus  claimed  for  a specific  hard- 
ware component,  all  standard  language  elements  that  pertain  to  that  component 
must  be  implemented  if  the  module  in  which  they  appear  is  included  in  the 
implementation.  Language  elements  that  pertain  to  specific  hardware  com- 
ponents for  which  support  is  not  claimed,  need  not  be  implemented.  Hov/ever, 
the  absence  of  such  elements  from  an  implementation  of  American  National 
Standard  COBOL  must  be  specified. 

b.  An  implementation  of  American  National  Standard  COBOL  may  include 
the  ENTER  statement  or  not,  at  the  option  of  the  implementor. 

c.  An  implementation  that  includes,  in  addition  to  a specified  level  of 
each  of  the  functional  processing  modules  and  of  the  Nucleus,  elements  or 
functions  that  either  are  not  defined  in  the  American  National  Standard  COBOL 
specification  or  are  defined  in  a aiven  level  of  a standard  module  not  other- 
wise  included  in  the  implementation,  meets  the  reouirements  of  this  Standard. 
This  is  true  even  though  it  may  imply  the  extension  of  the  list  of  reserved 
words  by  the  implementor,  and  prevent  proper  compilation  of  some  programs  that 
meet  the  requirements  of  this  Standard.  The  implementor  must  specify  any 
optional  language  (language  not  defined  in  a specified  level  but  defined  else- 
where in  the  Standard)  or  extensions  (language  elements  or  functions  not 
defined  in  this  Standard)  that  are  included  in  the  implementation. 

d.  In  general,  the  American  National  Standard  COBOL  specification 
specifies  no  upper  limit  on  such  things  as  the  number  of  statements  in  a pro- 
gram, the  number  of  operands  permitted  in  certain  statements,  etc.  It  is 
recognized  that  these  limits  will  vary  from  one  implementation  of  American 
National  Standard  COBOL  to  another  and  may  prevent  the  proper  compilation  of 
some  programs  that  meet  the  requirements  of  this  standard. 

IMPLEMENTOR-DEFINED  LANGUAGE  SPECIFICATIONS 

The  language  elements  in  the  following  lists  depend  on  implementor  defini- 
tions to  complete  the  specif icaton  of  the  syntax  or  rules  for  the  elements. 

The  elements  v.'hose  syntax  is  partly  implementor-defined  are: 

Element  Implementor-Defined  Aspect 


SOURCE-COMPUTER  paragraph 
OBJECT-COMPUTER  paragraph 
MEMORY  SIZE  clause 
alphabet-name 

SPECIAL-NAMES  paragraph 
ASSIGN  clause 


computer-name 

computer-name 

integer 

implementor-name;  whether  imple 
mentor-names  are  provided. 

implementor-name 

implcmentor-name 


VALUE  OF  clause 
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implementor-name;  whether  implementor- 
names  are  provided. 


RERUN  clause 
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CALL  and  CANCEL  statements 

COPY  statement 

ENTER  statement 
Margin  R 
Area  B 

Qualification 


implementor-name  and  the  form;  the 
Implementor  provides  at  least  one 
of  seven  specified  forms. 

relationship  between  operand  and  the 
referenced  program. 

relationship  between  library-name 
text-name,  and  the  library. 

language-name 

The  location. 

The  number  of  character  positions. 

The  number  of  qualifiers;  at  least 
five  must  be  supported. 


The  elements  whose  effect  is  partly  implementor-defined  are: 

Element  Implementor-Defined  Aspect 


alphabet-name  The  correspondence  between  native  and 

foreign  character  sets. 


implementor-name  switches  Whether  setting  can  change  during 

execution. 


USAGE  IS  COMPUTATIONAL 
clause 

USAGE  IS  INDEX  clause 

SYNCHRONIZED  clause 


ACCEPT  statement 


Representation  and  whether  automatic 
alignment  occurs. 

Representation  and  whether  automatic 
alignment  occurs. 

Whether  implicit  FILLER  oositions  are 
generated;  their  effect  on  the  size 
of  group  items  and  redefining  items. 

Maximum  size  of  one  transfer  of  data 
in  Level  1 Nucleus. 


DISPLAY  statement 


Maximum  size  of  one  transfer  of  data 
in  Level  1 Nucleus. 


Numeric  test 


Representation  of  valid  sign  in  the 
absence  of  the  SIGN  IS  SEPARATE 
clause . 


Comparison  of  nonnumeric  items  Collating  secuence,  where  NATIVE  or 

implementor-name  collating  sequence 
, is  implicitly  or  explicitly 

specified . 

Arithmetic  expressions  Number  of  places  carried  for  inter- 
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mediate  results. 


Elements  That  Pertain  to  Specific  Hardware  Components 

The  standard  language  elements  in  the  list  that  follows  pertain  to  specific 
types  of  hardv/are  components.  These  language  elements  must  be  implemented 
in  an  implementation  of  American  National  Standard  CCHOL  when  support  is 
claimed,  by  the  implementor,  for  the  specific  types  of  hardware  components  to 


which  they  pertain,  and  the  module 
that  implementation. 

Element 

CODE-SET  clause 

MULTIPLE  FILE  TAPE  clause 
CLOSE. . .REEL/UNIT  statement 
CLOSE... NO  REWIND  statement 
OPEN. .. REVERSED  statement 

OPEN... NO  REWIND  statement 

0PEN...I-0  statement 
(Sequential  I-O  only) 

OPEN  EXTEND  statement 

REWRITE  statement 

(Sequential  I-O  only) 

SEND. . .BEFORE/ AFTER 
ADVANCING  statement 

USE... I-O  (Sequential 
I-O  only) 

WRITE. . .BEFOBE/ AFTER 
ADVANCING 


which  they  are  defined  is  included  in 
Hardware  Component 


Device  capable  of  supporting  the 
specified  code. 

Reel 

Reel  or  mass  storage 

Reel  or  mass  storage 

Reel  with  the  capability  of  making 
records  available  in  the  reversed 
order;  mass-storage  vdth  the  cap- 
ability of  making  records  avail- 
able in  the  reversed  order. 

Reel  or  mass  storage 

Mass  storage 

Reel  or  mass  storage 

Mass  storage 

Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  mnemonic-names. 

Mass  storage 

Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  mnemonic-name. 


1.5  The  Federal  COBOL  Standard 

The  COBOL  compiler  validation  results  enclosed  in  this  document  reflect  the 
degree  to  which  the  subject  COBOL  compiler  implements  the  Federal  COBOL 
Standard.  The  Federal  COBOL  Standard  is  essentially  the  same  as  the 
American  National  Standard  Programming  Language  COBOL,  X3. 23-197*1,  with  two 
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. exceptions: 


The  Federal  COBOL  Standard  defines  levels  and  the  ANSI 
Standard  defines  only  the  minirauin  COBOL  Inplemcntation  and 
the  full  standard.  Low  and  Kieh  levels  of  the  Federal 
COBOL  Standard  (see  1.5.1)  correspond  to  the  above  two  ANSI 
levels  (minus  the  Report  Writer  module).  Two  additional 
levels,  low-intermediate  and  high-intermediate  have  been 
included  in  the  Federal  Standard  between  the  highest  and 
lowest  subsets.  These  additional  levels  accommodate 
hardware  which  cannot  support  the  full  standard,  but  vrhich 
is  capable  of  implementing  more  than  the  minimum  standard. 

The  Federal  COBOL  Standard  states  that  the  Report  Writer  Module 
is  not  mandatory  in  any  Federal  level,  but  that  the  specifica- 
tions contained  in  X?.2V-1974  should  be  used  to  the  extent 
practical,  consistent  with  requirements. 

The  Federal  COBOL  Standard  reouires  that  a compiler  contain  as  a minimum  the 
elements  specified  in  at  least  one  of  the  Federal  levels.  No  restrictions  are 
imposed  on  the  inclusion  of  selected  features  from  higher  levels  or  even  unique 
vendor  extensions.  Compatibility  amoung  various  implementations  of  a given 
level  containing  additional  features  must  be  controlled  by  management  imposed 
standards  and  restrictions. 

1.5.1  Federal  Standard  COBOL  Levels 

a.  Federal  Standard  COBOL  specifications  are  the  language  specifications 
contained  in  American  National  Standard  Programming  Language  COBOL,  X3.2?-1974. 
For  purposes  of  the  Federal  Standard , the  modules  defined  in  X3. 23-197*1  are 
combined  into  four  levels.  Not  all  computers  are  large  enough  to  accommodate  a 
COBOL  compiler  containing  the  full  ANSI  Standard.  Therefore,  the  Federal 
Government  requires  that  all  compilers  acquired  by  its  agencies  contain  as  a 
minimum  one  of  the  four  Federal  levels,  depending  on  machine  size,  configuration 
and  user  needs.  The  knowledge  that  all  computers  VJill  support  at  least  one  of 
these  four  subsets  simplifies  the  task  of  developing  machine-independent  COBOL 
programs. 

b.  The  four  levels  of  Federal  Standard  COBOL  are  identified  as:  Low, 
Low-Intermediate,  High-Intermediate,  and  High.  Each  Federal  Standard  COBOL 
level  is  composed  of  cither  the  high  or  low  levels  of  the  nucleus  and  ten  of 
the  eleven  Functional  Processing  Modules  (FPMs)  defined  in  X" . 2'^-197*l . 

The  four  Federal  Standard  COBOL  levels  are  reflected  in  the  following  table. 

The  numbers  in  the  table  refer  to  the  level  within  the  FPM  or  nucleus  as 
designated  in  X3. 23-197*1,  and  a dash  in  the  table  denotes  that  the  corres- 
ponding FPM  is  omitted. 


Low 

Inter- 

Low  mediate 

Level  Level 


High 
Inter- 
mediate High 

Level  Level 
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NUCLEUS 


1 


2 


2 


1 • 

FPMs 

11  2 2 

11  2 2 

1 2 2 

2 

- - 12 

1 1 2 

1 1 2 

1 2 2 

1 2 2 

2 2 


1.5.2  Conformance  to  Federal  Standard  COBOL 

A compiler  implemented  in  conformance  to  Federal  Standard  COBOL  must  meet  at 
least  the  follov/ing  requirements. 

a.  The  implementation  must  include  all  of  the  language  elements  of  at 
least  one  of  the  levels  of  Federal  Standard  COBOL. 

b.  The  implementation  must  meet  all  of  the  reouirpments  defined  in 
American  National  Standard  COBOL,  X?.2?-197*i,  Section  I,  paragraph  l.'i,  Defini- 
tion of  An  Implementation  of  American  National  Standard  COBOL  which  is  pro- 
vided in  section  1.^1  of  this  VSR. 

c.  The  implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  COBOL  for  monitoring  his  source  program 

at  compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a 
source  program  against  the  syntax  included  in  the  specified  level  of  Federal 
Standard  COBOL.  Any  syntax  used  in  the  source  program  that  does  not  conform 
to  that  allowed  by  the  user  selected  level  of  Federal  Standard  COBOL  will  be 
diagnosed.  The  syntax  diagnosed  as  not  conforming  to  the  specified  level  will 
be  identified  to  the  user  through  a diagnostic  message  on  the  source  program 
listing.  The  diagnostic  message  will  contain,  at  least:  (1)  The  identification 
of  the  source  program  line  number  in  which  the  nonconforming  syntax  occurs, 

(2)  the  identification  of  the  level  of  Federal  Standard  COBOL  that  supports 
the  syntax  or  that  the  syntax  is  nonstandard  COBOL. 

1.6.  Use  of  the  VSR 

The  Federal  COBOL  Compiler  Testing  Service  may  make  full  and  free  public 
disclosure  of  the  Validation  Summary  Report  (VSR)  in  accordance  with  the 
"Freedom  of  Information  Act"  (5  U.S.C.  /'552).  The  results  of  the  validation 
are  only  for  the  purpose  of  satisfying  United  States  Government  recuirements , 
and  apply  only  to  the  computer  system,  operating  system  release,  and  compiler 
version  identified  in  the  VSR.  >' 

• 


J 


TABLE  HANDLING 
SEQUENTIAL  I-O 
RELATIVE  I-O 
INDEXED  I-O 
SORT-MERGE 
REPORT  WRITER 
SEGMENTATION 
LIBRARY 
DEBUG 

INTER-PROGRAM 

COMMUNICATION 

COMMUNICATION 
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. The  COBOL  Compilrr  Validation  System  is  used  to  determine,  insofar  as  is 
practical,  the  det'rcc  to  which  the  subject  compiler  conforms  to  the  COBOL 
Standard.  Tnus,  the  VSR  is  necessarily  discretionary  and  judgmental.  The 
United  States  Government  docs  not  represent  or  warrant  that  the  statements, 
or  any  one  of  them,  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR 
is  not  meant  to  be  used  for  the  purpose  of  publicizing  the  findings  summarized 
therein . 

1.7  Sources  of  Additional  Information 

FIPS  PUP  21-1  defines  the  Federal  COBOL  Language  Standard.  This  publication 
is  available  from  the  Office  of  ADP  Standards  Management,  National  Bureau  of 
Standards,  Washington,  D.  C. , 202?4. 

The  detailed  COBOL  language  specifications  are  given  in  the  publication 
"American  National  Standard  Programming  Language  COBOL,  X?.2?-1974",  available 
from  the  American  National  Standards  Institute,  14?0  Broadway,  New  York,  New 
York  1001 R. 

An  explanation  of  the  COBOL  Compiler  Validation  System  is  conta.ined  in  the 
CeVS  User's  Guide.  This  document  explains  how  to  run  the  compiler  validation 
system.  The  User's  Guide  and  a magnetic  tape  containing  a copy  of  the  CCVS 
programs  are  available  from  the  National  Technical  Information  Service, 
Springfield,  Virscinia , 22151.  (Ordering  information  can  be  obtained  from 
the  Federal  COBOL  Compiler  Testing  Service.) 

1.8.  Requests  for  Interpretation 

Questions  regarding  this  VSR  or  the  CCVS  in  general  should  be  forwarded  to  the 
FCCTS.  If  any  problem  cannot  be  adequately  resolved  through  the  FCCTS,  the 
request  for  interpretation  will  be  forwarded  to  the  Federal  COBOL  Interpretation 
Committee  for  final  resolution. 

A brochure  describing  the  validation  process  including  the  procedures  for 
requesting  a validation  and  resolution  of  Questions  involving  interpretation 
of  the  current  Federal  Standard  is  available  from  the  Department  of  the  Navy, 
rcderal  COBOL  Compiler  Testing  Service,  Washington,  D.C.  20?76. 

1.9  Modules  and  Language  Elements  Excluded  from  Testing 

During  an  official  validation,  certain  CCVS  tests  may  not  be  used,  and  certain 
facilities  provided  by  the  subject  compiler  may  not  be  tested. 

1.9.1  Federal  Standard  COBOL  Approved  Interpretations 

The  National  Bureau  of  Standards  published  in  the  Federal  Register  Vol.  41 
No.  179,  September  14,  1976,  an  approved  interpretation  of  Federal  Standard 
COBOL  as  pertains  to  the  evaluation  of  arithmetic  expressions  in  the  COMPUTE 
statements.  This  interpretation  states  that  "size  of  the  intermediate  result 
field  is  implementor-defined." 

Since  the  results  of  evaluating  arithmetic  expressions  are  not  predictable,  all 
COMPUTE  statements  and  IF  statements  containing  arithmetic  expressions  have 
been  removed  from  the  COBOL  Compiler  Validation  System. 

1.9.2  Report  Writer  Module 
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FIPS  PUB  21-1  excludes  the  Repor*  Writer  Module  from  the  Federal  COBOL  Standard. 
However,  the  Report  Writer  Module  is  still  tested  durint;  a validation  if  support 
for  that  module  is  claimed  by  the  compiler  vendor. 

1.9.3  Communication  Module 

Although  it  is  part  of  Federal  Standard  COBOL  as  defined  by  FIPS  PUB  21-1,  the 
Communication  Module  is  not  currently  tested  in  the  course  of  an  official  vali- 
dation for  two  specific  reasons.  First,  a large  volume  of  reauests  for  inter- 
pretation on  this  module  have  been  submitted  to  the  cognizant  ANSI  committee 
(X3J^)  for  resolution.  Secondly,  facilities  for  testing  were  insufficient  to 
determine  the  validity  of  the  Communication  Module  test  programs  during  the 
development  of  CCVS7^. 

1.9.**  Vendor  Omissions  or  Extensions 

Language  elements  are  not  tested  which  have  been  legitimately  omitted  from  the 
implementation  by  the  implementor  (refer  to  l.^i).  Additionally,  no  implementor 
extensions  to  the  -standard  COBOL  language  arc  tested  in  any  way. 

1.10  Timeliness  of  the  Validation  Summary  Reports 

The  timeliness  of  the  Validation  Summary  Report  is  important.  Compilers 
and  their  related  operating  system  software  are  modified  several  times  a year. 
Ti.e  Compiler  Validation  System  used  to  validate  compilers  is  also  updated 
during  the  life  of  the  system.  Therefore  to  ensure  that  the  latest  version 
of  both  the  vendor's  compiler  and  the  Validation  System  are  the  latest  offici- 
ally released  versions,  check  with  the: 

Director 

Federal  CCBCL  Compiler  Testing  Service 
Department  of  the  Navy 
Washington,  D.  C.  20376 
(202)  697-1247 

Please  use  the  Validation  Summary  Report  number  of  this  report  when 
corresponding  with  the  Testing  Service. 


• SECTION  2.  DETAILED  EVALUATION  OF  ERRORS. 


This  section  summarizes  the  results  of  the  compilation  and  execution  of  the 
programs  comprising  the  COBOL  Compiler  Validation  System  (CCVS).  The  version 
of  the  CCVS  used  during  this  validation  is  shov.n  inside  the  front  cover  of  the 
VSR. 

Section  2 is  made  up  of  a variable  number  of  subsections.  The  number  of  sub- 
sections is  dependent  on  the  Level  of  Federal  COBOL  being  validated.  There  will 
be  a subsection  for  each  level  of  each  module  which  is  validated.  If  the  high 
level  of  a module  is  validated  then  there  will  be  two  subsections  for  that 
module;  one  for  the  low  level  and  one  for  the  high  level. 

A validation  of  the  low  level  of  Federal  Standard  COBOL  would  result  in  three 
subsections  being  present.  One  for  Nucleus  level  1,  one  for  Sequential  I-O 
level  1,  and  one  for  Table  Handling  level  1. 

Each  error  or  deviation  noted  in  this  section  makes  reference  to  a program  or 
functional  COBOL  module  contained  in  Appendix  A (Validation  Summary  Working 
Document).  This  reference  provides  the  documented  results  of  an  occurrence 
of  errors/deviataions  detected  during  the  running  of  the  CCVS  using  the  compiler 
within  the  environment  identified  within  this  document.  The  Validation  Summary 
Working  Document  is  presented  in  soouence  by  functional  module,  functional 
module  level  and  program  number  as  defined  below. 

Each  program  in  the  COBOL  Compiler  Validation  System  is  identified  by  a 5- 
character  program  name.  The  name  associates  the  routine  with  the  functional 
processing  module  and  level  of  American  National  Standard  Programming  Language 
COBOL  tested  within  the  program. 

The  five  character  name  has  the  general  format  XXNMH.  The  first  two 
characters  are  alphabetic  and  identify  the  functional  module  tested  by 
the  program.  The  permissable  values  are: 

NC  - Nucleus 
TH  - Table  Handling 
SQ  - Sequential  I-O 
RL  - Relative  I-O 
IX  - Indexed  I-O 
ST  - Sort-Merge 
RW  - Report  Writer 
SG  - Segmentation 
LB  - Library 
DB  - Debug 

IC  - Inter-Program  Communication 
CM  - Communication 

The  third  character  of  the  audit  routine  name  is  either  a 1 or  2,  and 
identifies  the  level  of  the  functional  module  being  tested.  Each  module  and 
level  is  represented  by  several  prosrrams.  The  fourth  and  fifth  characters  of 
the  program  name  are  sequence  numbers  for  programs  which  test  features  in  the 
same  level  of  the  same  functional  processing  module. 


As  an  example,  the  program  name  NC210  is  the  tenth  program  in  the  series  of 
routines  which  test  the  second  level  of  the  Nucleus  module. 


Description  of  Section  2. 

Each  error/deviation  is  noted  by  number  in  the  left  hand  margin  opposite 
the  language  element  in  question.  This  number  is  used  in  section  3 to 
categorize  errors  by  Federal  level  (See  I.5.I).  Inserted  directly  below 
the  language  element  is  a brief  description  of  the  error.  To  the  right  of 
the  langauge  element  is  a page  reference  to  X?. 23-197*),  American  National 
Standard  Programming  Language  COPCL.  The  reference  at  the  end  of  the 
description  of  the  error  is  to  Appendix  A.  which  contains  the  detailed 
information  collected  during  the  validation.  The  reference  is  made  up 
of  the  routine  name  followed  by  an  A or  E (A.  for  compile  time  or  syntax 
error  and  E for  execution  time  or  semantic  error)  and  a number  which  makes 
the  error  unique  in  Appendix  A. 

Example: 

2. 1 Nucleus  Level  1 


Operational  symbols:  S V P 11-21 

2.1.9  

» The  scaling  character  'P'  is  not  permitted  in  a 

• PICTURE  character-string. 

• (NC101.A.2) 


2.2  Sequential  I-O  Level  1 


2.1.9  represents  the  ninth  error  for  Nucleus  Level  1 

11-21  represents  the  page  in  X3. 23-1 97*)  where  the  language 
element  is  defined 

• Boxes  the  description  of  the  error/deviation 

NC101.A.2  represents: 

Program  name  - NC101 

Syntax  error  - A 
second  error  - 2 


2.1  NUCLEUS  LEVEL  1 


Language  Concepts  1-75 

Characters  used  for  words 1-76 

0,  1,  9 

A,  B,  . . . , Z 
- (hyphen  or  minus) 

Characters  used  for  punctuation 1-65 


" quotation  mark 
( left  parenthesis 
) right  parenthesis 
. period 
space 

= equal  sign 

Characters  used  in  editing 1-58 

B space 
0 zero 
+ pi  us 
- minus 
CR  credit 
DB  debit 

Z zero  suppress 
* check  protect 
$ currency  sign 
, comma 
. period 
/ stroke 


Separators 1-75 

The  separators,  semicolon  and  comma,  are  not 

allowed II-1 

Character-strings  1-76 

COBOL  v;ords 1-76 

Not  more  than  ?0  characters 

User-defined  words 1-76 

data-name 

Must  begin  with  an  alphabetic  character  II-1 

Must  be  unique;  may  not  be  qualified.  . II-1 


level-number 

mnemonic-name 

paragraph-name 

program-name 

routine-name 

section-name 

System-names 1-78 

computer-name 
impl ementor-name 
language-name 

Reserved  words 1-79 

Key  words 
Optional  words 

Figurative  constants I-80 

ZERO 

SPACE 

HIGH-VALUE 

LOW-VALUE 

QUOTE 

Special-character  words  ....  1-80 
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1-80 


r 


2.1.1 


Literals 

Nonnumeric  literals  have  lent^ths  from  1 
through  120  characters 

Numeric  literals  have  lengths  from  1 through 
18  digits 

"picture  character-strings 

Comment-entries  


1-82 

1-82 


• The  contiguous  characters  "C",  "0",  "P",  and  "Y"  were  parsed 

• and  treated  as  a COPY  verb  in  Identification  Division  comment- 

• entries. 

» (LB201.A.1,  LB202.A.1,  LP203.A.1,  LB201J.A.1,  LB2n5.A.1) 


Reference  Format 1-105 

Sequence  number  1-105 

Area  A 1-105 

Division  header  1-106 

Section  header 1-106 

Paragraph  header 1-107 

Data  Division  entries  1-107 

Area  B 1-105 

Paragraphs 1-107 

Data  Division  entries  1-107 

Continuation  of  lines  1-106 

Only  nonnumeric  literals  may  be  continued  . . II-1 

Comment  lines  1-108 

Asterisk  (*)  comment  lines 
Stroke  (/)  comment  line 

Identification  Division 1-9*1 

The  PROGRAK-ID  oaravraph II-? 

The  AUTHOR  paragraph II-2 

The  IHSTALLATIGN  paragraph II-2 

The  DATE-WRITTEN'  parafrranh II-2 

The  SECURITY  paragraph II-2 

Environment  Division 1-95 

The  SCURCE-CGKPUTER  paragraph  II-5 

computer-name 

The  OEJECT-CCKPUTER  paragraph  II-6 

computer-name 
MEMORY  SIZE  clause 
PROGRAM  CCLLATIHG  SECUENCE  clausa 
The  SPECIAL-NAMES  parastraph 11-6 


implemcntor-name  IS  nn‘'monic-name 
implementor-name  IS  mnemonic-name  series 
ON  STATUS 
OFF  STATUS 

alphabet-name  clause 
CURRENCY  SIGN  clause 
DECIMAL-POINT  clause 


Data  Division 1-97 

Working-Storage  Section  11-11 

The  data  description  entry 11-12 

The  BLANK  WHEN  ZERO  clause II-1*J 


f 
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The  data-name  or  FILLER  clause 11-15 

The  JUSTIFIED  clause  (may  be  abbreviated  JUST).  II-16 

Level-number 11-17 

01  through  10  (level  numbers  must  be  2 digits)  11-13 

77 11-11 

The  PICTURE  clause  (may  be  abbreviated  PIC)  . . II-18 


• A PICTURE  AE9  was  flagged  as  erroneous, 

» (NCIIJI.A.I) 


Character-string  may  contain  30  characters.  . II-18 

Data  characters:  AX9 II-18 

Operational  symbols:  S V P 11-21 

Fixed  insertion  characters 11-21 

0 (may  be  used  only  in  edited  items) 

» 

B (may  be  used  only  in  edited  items) 

$ (currency  sign) 

+ and  - 
DB  and  CR 
/ 

Replacement  or  floating  characters 11-21 

$ (currency  sign) 

+ and  - 
Z 

« 

Currency  sign  substitution 11-21 

Decimal  point  substitution 11-21 

The  REDEFINES  Claus'-  (may  not  be  nested).  . . . 11-27 

The  SIGN  clause 11-31 

The  SYNCHRONIZED  clause  (may  be  abbreviated  SYNC)  II-3? 

The  USAGE  clause 11-35 

COMPUTATIONAL  (may  be  abbreviated  CCMP) 

DISPLAY 

The  VALUE  clause 11-36 

literal 

Procedure  Division 1-99 

Conditional  expressions 11-^11 

Simple  condition II-41 

Relation  condition II-41 

Relational  operators 
[NOT]  GREATER  THAN 
[NOT]  LESS  THAN 
[NOT]  EQUAL  TO 

Comparison  of  numeric  operands 11-42 

Comparison  of  nor.numeric  operands  (oper- 
ands must  be  of  eoual  size) 11-42 

Class  condition 11-43 

NOT  option 

Switch-status  condition  11-44 

The  arithmetic  statements  11-51 

Arithmetic  operands  limited  to  18  digits 

Overlapping  operands 11-51 

The  ACCEPT  statement  (only  one  transfer  of  data)  11-53 
The  ADD  statement 11-55 


} 


1 


identifier/literal  series 
TO  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 

The  ALTER  statement  (only  one  procedure-name).  . 11-57 

The  DISPLAY  statement  (only  one  transfer  of  data)  11-59 
2.1.3  - 

• Output  of  DISPLAYed  numeric  data  was  edited. 

• (NC109.B.2,  NC158.B.2,  NC204.E.2) 


The  DIVIDE  statement  II-61 

INTO  identifier 
BY  identifier/literal 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 


The  ENTER  statement 11-6? 

The  EXIT  statement 11-64 

The  GO  TO  statement  (procedure-name  is  required)  11-65 


DEPENDING  ON  phrase 

The  IF  statement  (statements  must  be  imperative)  11-66 
ELSE  phrase 

The  INSPECT  statement  (only  single  character 

data  item) 11-68 

TALLYING  phrase 
ALL 

LEADING 
CHARACTERS 
REPLACING  phrase 
ALL 

LEADING 

FIRST 

CHARACTERS 

TALLYING  and  REPLACING  phrases 

The  MOVE  statement 11-74 

TO  identifier 
identifier  series 

The  MULTIPLY  statement  11-77 

BY  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 

The  PERFORM  statement 11-78 

procedure-name 
THRU  phrase 
TIMES  phrase 

The  STOP  statement ■ 11-85 

literal 

2.1.4  - - 

* STOP  QUOTE  statement  failed  to  output  a quote  mark. 

» (NC109.B.1,  NC15e.B.1) 


RUN 

The  SUBTRACT  statement  II-89 

identifier/literal  series 
FROM  identifier 
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2.2  NUCLEUS  LEVEL  2 


All  elements  of  1 NUC  1,2  are  a part  of  2 NUC  1,2 


Language  Concepts 1-75 

Characters  used  for  punctuation 1-65 

, comma 

; semicolon 

Characters  used  for  arithmetic  operations 1-52 


+ addition 

subtraction 
• multiplication 

/ division 

••  exponentiation 


Characters  used  in  relations 1-66 

= equal  to 

> greater  than 

< less  than 

Separators 1-75 

The  separators,  semicolon  and  comma,  are  allov'c-d  • ..  II- 1 

Character-strings 1-76 

COEOL  words 1-76 

User-defined  vords  1-76 

condition-name 

data-name 

Need  not  begin  with  an  alphabetic  character.  . II-1 

May  be  qualified  if  necessary  for  uniqueneps  . II-1 

Reserved  words  1-79 

Figurative  constants  I-80 


ZEROS;  ZEROES 

SPACES 

HIGH-VALUES 

LOW-VALUES 

QUOTES 

ALL  literal 

Connectives 1-79 

Qualifier  connectives:  OF,  IN 

Series  connectives:  , (separator  comm?) 

and  ; (separator  semicolon) 

Logical  connectives:  AND,  OR,  AND  NOT,  OR  NOT 
Qualification  1-87 


Reference  format  1-105 

Continuation  of  lines  (continuation  of  v;ords  and 

numeric  literals  is  allowed)  II-1 


2.2.1 


Identification  Division 1-9*1 

The  DATE-COMPILED  paragraph.  . . . ' II-U 


• Comment-entry  was  not  removed  from  DATE-CCMPILED  paragraph. 

• (NC203.A.1) 


Environment  Division 

The  SPECIAL-NAMES  paragraph 11-8 

alphabet-name  clause 
literal 
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Data  Division 1-97 

The  data  description  entry 11-12 

Level-number  11-17 

01  through  J)9  (level-numbers  may  be  1 or  2 digits)  , 

66 

88 

The  REDEFINES  clause  (may  be  nested) 11-27 

The  RENAMES  clause  (may  be  nested) 11-29 

data-narae 

data-name  THRU  dats-name 

The  VALUE  clause II-?6 

literal-1,  literal-2 
literal-1  THRU  literal-2 
literal  range  series 

Procedure  Division  1-99 

Arithmetic  expressions  11-39 

Conditional  expressions 11-1)1 

Simple  condition II-l)1 

Relational  condition II-l|1 

Relational  operators 
[NOT]  = 

[NOT]  > 

[NOT]  < 

Comparison  of  nonnumeric  operands  (ooerands  of 

unequal  size  are  allowed) II-i)2 

Condition-name  condition II-Dl) 

Sign  condition 11-1)4 

NOT  option 

Complex  condition 11-45 

Logical  operators  AND,  CR,  a"d  NOT 

Negated  simple  condition  11-46 

Combined  and  negated  combined  conditions  11-45 

Abbreviated  combined  relation  condition 11-4? 

Multiple  results  in  arithmetic  statements 11-51 

The  ACCEPT  statement  (no  restrictions  on  the  number 

of  transfers  of  data) 11-53 

FROM  phrase 

The  ADD  statement 11-55 

TO  identifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 

The  ALTER  statement.  . 11-57 

The  series  option  is  allov;ed 

The  COMPUTE  statement 11-58 

identifier  series 
ROUNDED  phrase 
SIZE  ERROR  phrase 

The  DISPLAY  statement  (no  restrictions  on  the  number 

of  transfers  of  data) 11-59 

UPON  phrase 

The  DIVIDE  statement  II-61 

INTO  identifier  series 
GIVING  identifier  series 
REMAINDER  phrase 

The  GO  TO  statement  (procedure-name  may  be  omitted).  . 11-65 

The  IF  statement  (nested  statements)  11-66 
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11-68 


r 


The  INSPECT  statement  (multi-character  data  items)  . . 
series 

The  MOVE  statement  

CORRESPONDING  phrase 

The  MULTIPLY  statement  

BY  identifier  series 
GIVING  identifier  series 

The  PERFORM  statement 

UNTIL  phrase 
VARYING  phrase 

The  STRING  statement  

DELIMITED  series 
POINTER  phrase 
ON  OVERFLOW  phrase 

The  SUBTRACT  statement  

FROM  identifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 

The  UNSTRING  statement  

DELIMITED  BY  phrase 
POINTER  phrase 
TALLYING  phrase 
ON  OVERFLOW  phrase 


ii-yii 

11-77 

11-78 

11-86 

11-89 

11-91 
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( 


2.?  TABLE  HANDLING  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

index-name 

Subscripting  - ? levels 1-89 

Indexing  - 3 levels 1-89 

Data  Division 

The  OCCURS  clause III-2 

integer  TIMES 

INDEXED  BY  Index-name  series 

The  USAGE  IS  INDEX  clause III-5 

Procedure  Division 

Relation  conditions  III-6 

Comparisons  involving  index-names  and/or 
index  data  items 

Overlapping  operands III-6 

The  SET  statement Ill- 11 

index-name/identifier  series 
index-name 

UP  BY  identifier/integer 
DOWN  BY  identifier/integcr 
index-name  series 
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. TABLE  HANDLING  LEVEL  2 


I 

I 

j 

t 

r. 


All  elements  of  1 TEL  1,2  are  a part  of  2 TBL  1,2 
Data  Division 

The  OCCURS  clause III-2 

integcr-1  TO  integcr-2  DEPENDING  ON  data-name 
ASCENDING/DESCENDING  data-narae 
data-name  series 
1SCEKDING/DESCENDIMG  series 

Procedure  Division 

The  SEARCH  statement III-7 

VARYING  phrase 
AT  END  phrase 
WHEN  phrase 

The  SEARCH  ALL  statement II1-7 

AT  END  phrase 
WHEN  phrase 
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'2.5  SEQUENTIAL  I-O  LEVEL  1 


Language  Concepts 

User-defined  words  1-76 

file-name 

record-name 

I-O  status IV-1 

Environment  Division 

The  FILE-CCNTRCL  paragraph IV-»I 

The  file  control  entry IV-*J 

SELECT  clause 


ASSIGN  TO  implementor-name  clause 
ORGANIZATICN  IS  SEQUENTIAL  clause 
ACCESS  MODE  IS  SEQUENTIAL  clause 
FILE  STATUS  clause 

The  I-O-CONTROL  paragraph IV-6 

RERUN  clause 
SAME  AREA  clause 
SAME  AREA  scries 


Data  Division 

File  Section IV-9 

The  file  description  entry IV-10 

The  record  description  entry  IV-9 

The  BLOCK  CONTAINS  clause IV-ll 

integer  CHARACTERS 
integer  RECORDS 

The  CODE-SET  clause IV-12 

2.5.1  — 


* Run-time  loop  in  program  using  a file  v.'ith  a OCDE-SET  clause. 

» (SQT11.P.1) 


The  DATA  RECORDS  clause IV-1? 

data-name 
data-name  series 

The  LABEL  RECORDS  clause IV-1 4 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause  IV-IB 

integer-1  TO  integer-2  CHARACTERS 

The  VALUE  OF  clause IV-19 

implcmentor-name  IS  literal 


implementor-name  IS  literal  series 
Procedure  Division 

The  CLOSE  statement  (only  a single  file-name  may  appear 


in  a CLOSE  statement) IV-20 

REEL 

UNIT 

The  OPEN  statement  (only  a single  file-name  may  appear 

in  an  OPEN  statement) IV-24 

INPUT 

OUTPUT 

I-O 

The  READ  statement  ........  IV-28 

INTO  identifier 
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AT  END  phrasp 

The  REWRITE  statement 

FROM  identifier 

The  USE  statement 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement 

FROM  identifier 
BEFORE/AFTER  intci?er  LINES 
BEFORE/AFTER  PAGE 


IV-31 

IV-?2 


IV-314 


[ 

I 

i 
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.2.6  SEQUENTIAL  I-O  LEVEL  2 


i 

'I 

j 

■* 

I 

\ 


d 

jj 

I 


s 


All  elements  of  1 SEQ  1,2  are  a part  of  2 SEQ  1,2 


Language  Concepts 

Special  register  1-80 

LINAGE-CCUNTER IV-3 

Environment  Division 

The  FILE-CCNTRCL  paragraph  IV-H 

The  file  control  entry IV-ll 

SELECT  clause 

OPTIONAL  phrase 

RESERVE  intf-ger  AREA(S)  clause 

The  1-O-CONTROL  paragraph IV-6 

SAME  RECORD  AREA  clause 
SAME  RECORD  AREA  series 
MULTIPLE  FILE  TAPE  clause 


Data  Division 

The  file  description  entry ' IV-10 

The  BLOCK  CONTAINS  clause  IV-11 

integer-1  TO  integer-2  RECORDS 
integer- 1 TO  integer-2  CHARACTERS 

The  LINAGE  clause IV-15 

2.6.1  — 

* LINES  AT  BOTTOM  clause  ignored. 


(SC213.B.1,  S021t.P,.l,  SC215.B.1) 


FOOTING  phrase 
TOP  phrase 
BOTTOM  phrase 

The  VALUE  OF  clause IV-19 

implementor-name  IS  d?tr.-neme 
implementor-name  IS  dr.ta-name  series 

Procedure  Division 

The  CLOSE  statement IV-20 

NO  REWIND,  REMOVAL,  or  LOCK 
file-name  series 

The  OPEN  statement IV-2*4 


INPUT 

REVERSED 
NO  REWIND 
OUTPUT 

NO  REWIND 
EXTEND 

file-name  series 

INPUT,  OUTPUT,  I-O,  and  EXTEND  series 


The  USE  statement IV-?2 

EXCEPTICN/ERRCR  PROCEDURE  ON  file-name  series 
EXCEPTJCN/ERROR  PROCEDURE  ON  EXTEND 

The  WRITE  statement IV-3U 

EEFORE/AFTER  identifier  LINES 
BEFORE/AFTER  mnemonic-name 
AT  END-OF-PAGE  imperative-statement 
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. ‘2.7  RELATIVE  1-0  LEVEL  1 


Language  Concepts 

User-defined  words 

file-name 

record-name 

I-O  status 

Environment  Division 

The  FILE-CONTROL  paragraph 

The  file  control  entry 

SELECT  clause 

ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  RELATIVE  clause 
ACCESS  MODE  clause 
SEQUENTIAL 
RANDOM 

FILE  STATUS  clause 

The  I-O-CCNTROL  paragraph  

RERUN  clause 
SAME  AREA  clause 
SAME  AREA  series 

Data  Division 

File  Section 

The  file  description  entry 

The  record  description  entry 

The  BLOCK  CONTAINS  clause  

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause  

data-name 
data-name  series 

The  LABEL  RECORDS  clause 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause 

integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OF  clause  ! 

implementor-name  IS  literal 
implementor-name  IS  literal  series 


Procedure  Division 

The  CLOSE  statement  . 
WITH  LOCK 
file-name  series 
The  DELETE  statement. 

INVALID  KEY  phrase 
The  OPEN  statement.  . 
INPUT 
OUTPUT 
I-O 


1-76 


V-2 


V-5 

V-5 


V-7 


V-10 

V-11 

V-10 

V-12 


V-13 


V-1H 


V-15 

V-16 


V-17 

V-19 

V-20 


V-23 


25 


INVALID  KEY  phrase 

The  REWRITE  statement  V-26 

FROM  identifier 
INVALID  KEY  phrase 

The  USE  statement V-?0 


EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement V-?2 

FROM  identifier 
INVALID  KEY  phrase 


2.8  RELATIVE  I-O  LEVEL  2 

All  elempnts  of  1 REL  0,2  are  a part  of  2 REL  0,2 


Environment  Division 

The  FILE-CONTROL  parai?raph V-5 

The  file  control  entry V-5 

SELECT  clause 

RESERVE  integer  AREA(S)  clause 
ACCESS  MODE  IS  DYNAMIC  clause 

The  I-O-CCNTRCL  paraj^raph V-7 

SAME  RECORD  AREA 

SAME  RECORD  AREA  entries 


Data  Division 

The  file  description  entry V-11 

The  BLOCK  CONTAINS  clause  V-12 

intep,er-1  TO  intcger-2  RECORDS 
integer- 1 TO  inteper-2  CHARAOTERS 

The  VALUE  OF  clause V-l6 

implementor-name  IS  data-namr 
implementor-name  IS  data-name  entries 

Procedure  Division 

The  READ  statement V-23 

NEXT  RECORD 

The  START  statement V-28 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement V-30 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name  series 


•2.9  INDEXED  I-O  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

file-name 

record-name 

I-O  status VI-2 

Environment  Division 

The  FILE-CONTROL  paragraph VI-5 

The  file  control  entry VI-5 

SELECT  clause 


ASSIGN  TO  implementor-name  cla.use 
ORGAMIZATICU  IS  INDEXED  clause 
ACCESS  MODE  clause 
SEQUENTIAL 
RANDOM 

RECORD  KEY  clause 
FILE  STATUS  clause 

The  I-O-CONTRCL  paragraph  VI-8 

RERUN  clause 
SAME  AREA  clause 
SAKE  AREA  series 


Data  Division 

File  Section VI-11 

The  file  description  entry VI-12 

The  record  description  '-ntry VI-11 

The  BLOCK  CONTAINS  clause  VI-1? 

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause VI-Hl 

data -name 
data -name  series 

The  LABEL  RECORDS  clause VI-15 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause VI-16 

integer-1  TO  integrr-2  CHARACTERS 

The  VALUE  OF  clause  VI-17 

implementor-name  IS  literal 


^ implementor-name  IS  literal  scries 


Procedure  Division 

The  CLOSE  statement VI- 1 8 

WITH  LOCK 
file-name  series 

The  DELETE  statement VI-20 

INVALID  KEY  phrase 

The  OPEN  statement VI -21 

INPUT 

OUTPUT 

I-O 

file-name  series 


INPUT,  OUTPUT,  and  I-O  series 

The  READ  statement VI-2*t 

INTO  identifier 
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AT  END  phrase 
INVALID  KEY  phrase 
The  REWRITE  statement  . . . . 
FROM  identifier 
INVALID  KEY  phrase 

The  USE  statement  

EXCEPTICN/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement  

FROM  identifier 
INVALID  KEY  phrase 


VI-28 


VI-32 


VI-3? 
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• 2.10  INDEXED  I-O  LEVEL  2 


All  elements  of  1 INX  0,2  are  a part  of  2 INX  0,2 

Environment  Division 

The  FILE-CCNTROL  parasrraph VI-5 

The  file  control  entry VI-5 

SELECT  clause 

RESERVE  integer  AREA(S)  clause 
ACCESS  MODE  IS  DYNAMIC  clause 
ALTERNATE  RECORD  KEY  clause 
WITH  DUPLICATES  phrase 

The  I-O-CONTROL  paragraph VI-R 

SAME  RECORD  clause 
SAME  RECORD  AREA  series 

Data  Division 

The  file  description  entry VI-12 

The  BLOCK  CONTAINS  clause VI- 1? 

integer-1  TO  integcr-2  RECORDS 
integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OF  clause VI-17 

implementor-namc  IS  data-name 
implementor-name  IS  data-name  series 

Procedure  Division 

The  READ  statement VI-2M 

KEY  IS  phrase 
NEXT  RECORD 

The  START  statement VI-?0 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement VI-?2 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name  series 
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2.11  SORT-MERGE  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

file-name 

Environment  Division 

The  FILE-CONTROL  paragraph VI 1-2 

The  file  control  entry VII-2 

SELECT  clause 


. ASSIGN  TO  implementor-name  clause 


Data  Division 

File  Section VII-5 

The  sort-merge  file  description  entry  VII-5 

The  DATA  RECORDS  clause VII-6 

The  RECORD  CONTAINS  clause VII-7 

Procedure  Division 

The  RELEASE  statement  VII-12 

FROM  phrase 

The  RETURN  statement VII-13 

INTO  phrase 
AT  END  phrase 


The  SORT  statement  (only  one  SORT  statement,  a STOP 
RUN  statement,  =nd  any  associated  input-output 
procedures  allov'ed  in  the  nondecla.rative 

portion  of  a program) VII-1^1 

KEY  data-name 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mixed  ASCENDING/DESCENDING 
INPUT  PROCEDURE  phrase 
THRU 

USING  phrase 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 


2.12  SORT-MERGE  LEVEL  2 


All  elements  of  1 SRT  0,2  are  a part  of  2 SRT  0,2 


Environment  Division 

The  FILE-CONTROL  parai^raph VII-2 

The  file  control  entry VII-2 

SELECT  clause 

The  I-O-CONTROL  paraa;raph . VII-? 

SAME  RECORD  AREA  clause 


SAME  SORT/SORT-MERGE  AREA  clause 
SAME  series 

Procedure  Division 

The  MERGE  statement VII-8 

KEY  data-name 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mixed  ASCENDING/DESCENDING 
COLLATING  SECUENCE  phrase 
USING  phrase 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 

The  SORT  statement  (multiple  SORT  statements  are 

permitted) VII-1^1 

COLLATING  SEQUENCE  phrase 
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•2.13  REPORT  WRITER  LEVEL  1 


Language  Coneept 

User-defined  words  1-76 

file-name 

report-name 

Special  registers  I-80 

LINE-COUNTER  VIII-1 

PAGE-COUNTER  VIII-1 


IL 


Data  Division 

Report  Section  VIII-2 

The  file  description  entry  VIII-3 

The  report  description  entry  VIII-4 

The  report  group  description  entry  VIII-6 

The  BLOCK  CONTAINS  clause  VIII-24 

The  CODE  clause VIII-25 

The  CODE-SET  clause  VIII-26 

The  COLUMN  NUMBER  clause  VIII-27 

The  CONTROL  clause  VIII-28 


data-name 
data-namc  series 
FINAL 

FINAL  data-name  series 


The  data-name  clause  VIII-30 

The  GROUP  INDICATE  clause  VIII-?1 

The  LABEL  RECORDS  clause VIII-:’2 

The  LIKE  NUMBER  clause  VIII-3? 

integer 
NEXT  PAGE 
PLUS  integer 

The  NEXT  GROUP  clause  VIII-35 

integer 
PLUS  integer 
NEXT  PAGE 

The  PAGE  clause VIII-36 


integer  LINES 
HEADING 
FIRST  DETAIL 
LAST  DETAIL 
FOOTING 


The  PICTURE  clause II-18 

The  RECORD  CONTAINS  clause  VIII-39 

The  REPORT  clause  VIII-40 

report-name  series 

The  SOURCE  clause  VIII-41 

The  SUM  clause VIII-42 

UPON  data-name  series 


RESET  phrase 
The  TYPE  clause  . . . 
REPORT  HEADING  (RH) 
PAGE  HEADING  fPH) 
CONTROL  HEADING  (OH) 
DETAIL  (DE) 

CONTROL  FOOTING  fCF) 
PAGE  FOOTING  (PF) 
REPORT  FOOTING  (RF) 


VIII-45 
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The  VALUE  IS  clause 
The  VALUE  OF  clause 


11-36 

VIII-50 


Procedure  Division 

The  GENERATE  statement 
report-name 
data-name 

The  INITIATE  statement 
report-name 

The  SUPPRESS  statement 
report-name 

The  TERMINATE  statement 
report-name  series 

The  USE  statement  . . 
BEFORE  REPORTING 


1 

i 

i 

, i 

VIII-51  ^ 


VIII-53 

VIII-5'< 

VIII-55 

VIII-56 


3U 


2.1i»  SEGMENTATION  LEVEL  1 


Lan«;uage  Concepts 

User-defined  words 1-76 

segment-number 

Procedure  Division 

Segment-numbers  IX-4 

Fixed  segment-number  range  P throuirh  49 
Non-fixed  segment-number  rcncrc  50  through  99 
All  sections  with  the  same  segmenc-rumber  must 
be  together  in  the  source  program 


• 2.15  SEGMENTATION  LEVEL  2 


2.16  LIBRARY  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

text-name 

All  divisions 

The  COPY  statement X-2 
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‘2.17 


LIBRARY  LEVEL  2 

All  elements  of  1 LIE  0,2  are  a part  of  2 LIB  0,2 
Language  Concepts 

User-defined  

library-name 

All  divisions 

The  COPY  statement  

OF  library-name 
REPLACING  phrase 


1-76 

X-2 
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•2.18  DEBUG  LEVEL  1 


Language  Concepts 

Special  registers 

DEEUG-ITEM 

Environment  Division 

The  SCURCE-CCMPUTER  paracraph 
WITH  DEBUGGING  MODE  clause 


1-80 

XI-1 


XI-3 


Procedure  Division 

USE  FOR  DEBUGGING  statement XI-*) 

procedure-name 
procedi’.re-name  series 
ALL  PROCEDURES 

Debugging  lines XT-10 


I 
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?.19  DEBUG  LEVEL  2 


All  elements  of  1 DEB  0,2  are  a part  of  2 DEB  0,2 
Procedure  Division 

USE  FOR  DEFUGGIMG  statement 

ALL  REFERENCES  OF  identifier  series 
file-name  series 
cd-name  series 


XI-M 




INTER-PROGRAM  COMMUNICATIONS  LEVEL  1 


Data  Division 

Linkage  Section XII-2 

Procedure  Division 

Procedure  Division  header XII-^» 

USING  phrase 

The  CALL  statement XII-5 

literal 

USING  data-name  series 

The  EXIT  PROGRAM  statement XII-8 


'2.21  INTER-PROGRAM  COMMUNICATIONS  LEVEL  2 


All  elements  of  1 IPC  0,2  are  a part  of  2 IPC  0,2 


Procedure  Division 

The  CALL  statement XII-5 

identifier 
ON  OVERFLOW  phrase 

The  CANCEL  statement XII-7 


1 


A 


.2.22  COMMUNICATION  LEVEL  1 


• The  COMMUNICATION  Module  is  not  currently  evaluated  as 

• part  of  an  official  validation.  See  Section  1.9.3. 


Language  Concepts 

User-defined  words 
cd-name 


1-76 


Data  Division 

Communication  Section  XIII-2 

The  communication  description  entry  XIII-3 


FOR  INPUT  clause 
END  KEY 
MESSAGE  COUNT 
MESSAGE  DATE 
MESSAGE  TIME 
SYMBOLIC  CUEUE 
SYMBOLIC  SOURCE 
SYMBOLIC  SUP-OUEUE-n 
STATUS  KEY 
TEXT  LENGTH 
FOR  OUTPUT  clause 
DESTINATION  COUNT 
DESTINATION  TABLE 
INDEXED  BY 
ERROR  KEY 

SYMBOLIC  DESTINATION 
STATUS  KEY 
TEXT  LENGTH 

Procedure  Division 


The  ACCEPT  MESSAGE  COUNT  statement XIII- 12 

The  DISABLE  statement  XIII- 1 3 

INPUT 

OUTPUT 

KEY  identifier/literal 

The  ENABLE  statement XIII-15 

INPUT 

OUTPUT 

KEY  idcntifier/literal 

The  RECEIVE  statement  XIII-17 

MESSAGE 

INTO  identifier 
NO  DATA  phrase 

The  SEND  statement XIII-20 


FROM  identifier-1  WITH 
WITH  EMI 
WITH  EGi 

BEFORE/AFTER  ADVANCING 
identifier-3  LINES 
integer  LINES 
mnemonic-name 
PAGE 


U3 


‘2.23  COMMUNICATION  LEVEL  2 


I 

- — --- — --- — i 

The  COMMUNICATION  Module  is  not  currently  evaluated  as  ■ 

part  of  an  official  validation.  See  Section  1.9.?. 


All  elements  of  1 COM  0,2  are  a part  of  2 COM  0,2 
Communication  Section 

The  comraur ication  description  entry XIII-? 

FOR  INPUT 
INITIAL 


Procedure  Division 

The  DISABLE  statement XIII-1?  I 

INPUT 

TERMINAL 

The  ENABLE  statement  XIII-15 

INPUT 

TERMINAL 

The  RECEIVE  statement XIII-17 

SEGMENT 

The  SEND  statement  XIII-20 

FROM  identifier-1 
WITH  identifier-2 
WITH  ESI 


SECTION  ?.  COMPILER  STATUS 

3.1  Federal  Standard  COPOL 

Section  1.5  explains  the  four  levels  of  Federal  Standard  COBOL  and  their 
relation  to  American  National  Standard  CCECL.  This  section  lists  the  dis- 
crepancies described  in  Section  2 by  the  Federal  level  in  which  the  problem 
occurs.  All  errors  listed  for  a lover  level  are  also  errors  in  any  higher 
level,  even  though  they  are  listed  only  in  the  lov:er  level.  The  paragraph 
number  from  Section  2 is  used  to  reference  the  errors  in  each  Federal  level 

3.1.1  Low  Level 

2.1.1  "COPY"  parsed  in  conrarnt-entrics . 

2.1.2  PICTURE  AE9  flagged  as  erroneous. 

2.1. ?  DISPLAYS  of  numeric  items  v'«re  edited. 

2.1. M  Quote  rr  3rk  not  output  by  STOP  QUOTE. 

2.5.1  Run-time  loop  in  program  v.’ith  CODE-SET  clause. 

3.1.2  Low-Intermediate  Level 

None 

3.1.3  High-Intermediate 

2.2.1  Comment-entry  not  removed  from  DATE-COMPILED  paragraph. 

2.6.1  LINES  AT  BOTTOM  ignored. 

3.1.**  High  Level 
None 


3.2  American  National  Standard  COBOL 

Full  American  National  Standard  COEOL  consists  of  the  entire  set  of  1-r.guage 
elements  defined  in  the  ANSI  COBOL  standard  (refer  to  1.7).  It  is  also  the 
equivalent  of  high  level  Federal  Standard  COEOL  plus  the  Report  Writer 
module.  Therefore,  this  section  lists  only  those  discrepancies  found  while 
validating  the  Report  Writer  Module. 

None 


*♦5 


■ SECTION  4,  SOFTWARE  ENVIRONMENT 


The  compiler  referenced  in  this  document  was  validated  using  the  software 
environment  described  in  this  section.  When  using  a modification  of  the 
described  environment,  the  compiler  may  or  may  it  continue  to  conform  to  the 
Standard,  It  should  be  noted  that  during  the  validation  process,  an  attempt 
is  made  to  validate  as  many  different  options  as  possible. 

The  use  of  compiler  options,  implementor-names  in  the  Environment  Division 
and  any  form  of  optimization  which  is  not  described  in  this  report  could  cause 
the  compiler  to  produce  a program  that  does  not  perform  according  to  the 
specifications  of  Standard  COBOL.  Only  the  environment  described  in  this 
document  has  been  used  with  this  compiler  to  satisfy  the  requirements  of  FIPS 
PUB  21-1  and  FPMR  101-?2. 1305,  la.  (Any  deviations  which  must  be  corrected  as 
per  the  referenced  FPMR  are  described  in  Sections  2 and  3 of  this  report.) 

1.  Options  or  parameters  used  on  the  processor  call  statement  for  the  compiler: 
The  following  options/parameters  were  used  during  the  validation. 

Options  specified:  B=LG01  (disposition  of  binary  output) 

DB=B  (produce  binary  resardless  of  errors) 

CPY  (compile  all  COPY  statements) 

X=C0LIE  (name  of  library  file) 

SB  (compile  as  a subprogram) 

(Not  all  options  were  used  for  all  programs) 


2.  Environment  Division  implementor-names. 


Printer  destined  files 

•OUTPUT'  USE  'PRlKTFrYES' . 

Tape  files 

For  single-file  reels: 

TAPEnn  (where  n is  a numeric  digit) 
For  multi-file  reels: 

MULT I On 

Sequential  Mass-storage  files 

Single-unit : 

MSDISCn 
Multi-unit : 

UNITnn 

Relative  I-O  files 
RELn 

Indexed  I-O  files 
ISFILEn  INDEXn 


I 

I 


46 


Sort  files 


i 


SORTFLn 

Switch  names 

SWITCH- 1 
SWITCH-2 

Source  Computer  name 
CYBER-170 

Object  Computer  name 
CYBER-170 


3.  Optimization.  The  compiler  may  or  may  not  have  optimization  features. 

If  optimization  is  available  by  option,  it  was  used  during  the  validation 
process  (during  a separate  execution  of  the  Compiler  Validation  System) 
to  determine  if  its  use  causes  the  compiler  to  produce  a program  v.-hich 
does  not  give  the  expected  results.  If  the  optimization  is  invoked  through 
the  compiler  call  statement  then  it  is  mentioned  in  paragraph  1 above.  If 
it  is  invoked  through  the  introduction  of  syntax  in  other  than  th"  Data 
and  Procedure  Divisions  of  the  source  program  it  is  shown  below.  Optimization 
which  would  require  modification  to  the  Data  and  Procedure  Divisions  is  not 
considered  in  this  report  in  that  it  is  beyond  the  scope  of  the  use  of 
standard  COBOL  and  the  validation  process. 

There  is  no  specific  optimization  option  for  this  compiler. 

H.  Compiler. 

Control  Data  Corporation,  COBOL  5.1,  Release  Level  il50  usin^  OORT  ^.5, 

Release  Level  460. 

5.  Operating  system. 

Control  Data  Corporation,  NOS  1.2,  Release  Level  460 
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SECTION  5.  ASCII  VALIDATION 


5.1  Purpose  of  ASCII  Validation 

The  ASCII  Validation  is  performed  by  running  a sequence  of  three  CCVS7^ 
programs  (50118,  S0119,  SC120)  using  special  procedures.  The  purpose  of  this 
special  run  is  to  validate  that  the  compiler/operating  system  bcint?  tested 
is  capable  of  processing  ASCII  code  represented  on  maenetic  tape  and 
punched  cards  that  were  produced  (in  accordance  with  the  appropriate  American 
National  Standard)  by  another  system.  There  is  also  a magne.tic  tape  and  a card 
file  created  during  the  validation  which  v/ill  be  taken  to  another  system  for 
further  processing.  The  purpose  is  to  determine  whether  the  compiler/operating 
system  being  tested  can  also  produce  ASCII  representation  on  magnetic  tape  and 
punched  cards  which  can  be  processed  by  a another  computer  system. 


5.2  Applicable  ANSI  Standards 

The  ASCII  Validation  is  based  on  several  American  National  Standards  and 
presumes  their  support  by  the  compiler/operating  system  being  validated. 

These  are: 

1.  American  National  Standard  Programming  Language  CCPOL  X?.2?-1974 

The  CODE-SET  clause  is  used  to  read  and  v.Tite  the  ASCII 
files . 

- The  PROGRAM  COLLATING  SFOUENCE  clause  is  used  to  process  the 
data  in  ASCII  mode  as  v;ell  as  native  mode. 

The  SIGN ...  SEPARATE  clause  is  used  for  signed  data  and  all 
data  is  in  the  DISPLAY  (character)  mode. 

2.  American  National  Standard  Code  for  Information  Interchange 
(ASCII)  X?.^-1963.  (Note  that  this  describes  the  code,  not  the 
labeling  and  tape  recording  formats.) 

3.  American  National  Standard  Hollerith  Punched  Card  Code, 

X3. 26-1970. 

*1,  American  National  Standard  Magnetic  Tape  Labels  for  Information 
Interchange,  X?. 27-1969. 

5.  American  National  Standard  Recorded  Magnetic  Tape  for  Information 
Interchange  (800  CPI,  NZRl),  X?. 22-1967. 

6.  American  National  Standard  Recorded  Magnetic  Tape  for  Information 
Interchange  (l600  CPI,  PR),  X?. 39-197?. 

The  language  of  the  197*4  COBOL  Standard  provides  the  capability  to  accept, 
process,  and  produce  ASCII  code.  The  ASCII  Standard  describes  the  cod<-  insofar 
as  the  bit  arrangement  and  configuration,  but  does  not  address  recording  tech- 
niques, record  form-ts  or  any  labeling  scheme.  The  SOO  CPI,  NZPI  magnetic  tape 
recording  standard  was  used  to  establish  the  recording  density  and  techniques. 
(1600  CPI,  PE  based  on  X?.79-197?  "Recorded  Magnetic  Tap?  for  Information  Inter- 
change" could  be  used  under  special  arrangements.)  The  tape  labeling  scheme 
used  in  these  tests  is  based  on  X'. 27-1969  but  is  also  compatible  with  the 


ka 
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• revision  to  that  tape  label  standard.  Only  the  VOL1,  HDR1,  and  E0F1  labels  are 


used.  The  records  are  fixed  length  and  unblocked. 


5.?  ASCII  Validation  Process 

During  the  validation,  the  Validation  Manager  for  the  Federal  COEOL  Com- 
piler Testing  Service  uses  the  ASCII-encoded  magnetic  tape  and  card  files 
in  addition  to  the  normal  ta.pe  files  associated  with  a validation.  For  the 
ASCII  portion  of  the  validation  the  following  steps  are  performed; 

1.  The  tape  file  and  card  deck  (produced  on  another  computer  system) 
are  used  as  input  to  several  provra.rns  designed  to  validate  v’hethcr 
the  system  being  validated  can  accept  and  process  the  data,  as 
defined  by  the  respective  standards.  Any  changes  made  during  this 
validation  to  the  source  programs  reading  the  data  are  noted 
beloi;  in  5.^.1. 

2.  A tape  file  and  card  file  are  produced  during  the  validation  which 
should  prove  to  be  identical  to  the  files  described  in  1 above. 

These  two  files  are  then  processed  on  a different  computer  system 
to  determine  the  degree  to  which  the  system  being  validated  sup- 
ports the  ASCII  standard.  Any  cha.nncs  made  during  this  validation 
to  the  source  program  producing  the  data  are  noted  below  in  5.^.2. 

Results  for  This  Validation 

1.  The  CYBER  7^  system  was  able  to  successfully  process  both  the  ANSI- 
labeled  magnetic  tape  and  the  Hollerith  card  deck  (both  v.’ith  ASCII 
code  representations).  No  program  modifications  were  necessary. 

2.  The  CYBER  7^1  system  produced  both  an  ANSI  labeled  magnetic  tape  and 
a Hollerith  card  deck,  which  were  verified  later  on.  a foreign  system 
as  being  correct  in  ANSI  format  and  ASCII  character  set.  No  program 
modifications  were  necessary. 
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APPENDIX  A 


VALIDATION  SUMMARY  WORKING  DOCUMENT 


A-1  This  appendix  is  a working  paper  produced  during  the  validation  ■ 
and  documents  the  results  of  th'^  conipilation  and  execution  of  each  of  the  ' 
programs  comprisins:  the  CCVS.  The  results  contained  herein  arc  based  on  1 
the  use  of  the  compiler  within  th°  Validation  Environment  identified  in  j 
this  appendix.  This  appendix  (Validation  Summary  Working  Document)  is  not  j 
part  of  the  official  Valida.tion  Summary  Report  (VSR)  and  is  not  intended  i 
to  reflect  in  any  way  the  compiler's  usefulness  or  degree  of  conformance  ! 
to  the  language  specifications.  | 

! 

The  reader  of  this  appendix  should  keep  in  mind  that  the  same  pro-  j 
blem  ares  may  appear  in  more  than  one  nrogra.m,  but  is  considered  only  as  one  ! 
single  discrepancy  and  as  such  is  reflected  only  once  in  the  body  of  the  j 
VSR.  (The  VSR  will  in  turn  only  reference  the  first  occurrence  of  the  ! 
problem  in  the  appendix.)  | 

The  reference  documents  for  COBOL  are  American  National  Standard  i 
Programming  Language  COBOL  (X’.2?-197^) , and  Federal  Standard  COBOL  ; 
(FIPS  PUB  21-1). 


VALIDATION  ENVIRONMENT 

COMPILER  IDENTIFICATION:  COBOL  5.1,  Release  Level  U60  with  SOFT  H.5, 

Release  Level  *460 

COMPUTER  SYSTEM:  Control  Data  Corporation,  CYBER  IH,  SN108 

Dual  CPU 

265K  extended  core  storage 

667  nnd  669  tape  drives 

8*4*4  single  and  double  density  disks 

13IK  memory  with  20  PPUs 

OPERATING  SYSTEM:  NOS  1.2,  Release  Level  *460 
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COMMUNICATION  LEVEL  1 and  LEVEL  2 

No  Communication  pr..!grams  were  run.  See  Section  1.9.?. 


DEBUG  MODULE  LpvoI  1 


DB101  thru  DB105 

A.  Compilation: 

No  errors. 

B.  Execution: 

1.  Some  line  number  values  in  the  DEBUG-LINE  register  were  off-tar;;^et 
by  one  line,  presumably  a result  of  the  parser  design  employed  by  the 
compiler . 

DEBUG  MODULE  LEVEL  2 
DB201  thru  DB204 

A.  Compilation: 

No  errors. 

B.  Execution: 

1.  Some  line  number  values  in  the  DEEUG-LINE  register  were  off-tarstet 
by  one  line,  presumably  a result  of  the  parser  design  employed  by  the 
compiler . 
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INTER-PROGRAM  COMMUNICATION  MODULE  Level  1 
IC101  thru  IC115 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

IC151  thru  IC152 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

INTER-PROGRAM  COMMUNICATION  MODULE  Level  2 
IC201  thru  IC208 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

i 


1 
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INDEXED  I-O  MODULE  Level  1 
1X101  thru  1X107 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

INDEXED  I-O  MODULE  Level  2 
1X201  thru  1X208 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 


LIBRARY  MODULE  Level  1 


LB101  thru  LB107 

A.  Compilation: 
No  errors. 

B.  Execution: 

No  failures. 


LIBRARY  MODULE  Level  2 
LB201  thru  LB207 

A.  Compilation: 

1.  In  programs  LB201  through  LP205,  the  contiguous  characters, 

C,  0,  P,  Y;  located  in  comment-entries  in  the  Identification  Division, 
were  parsed  and  treated  as  a COPY  verb;  e.K., 

SECURITY. 

NOME . 

THIS  PROGRAM  TESTS  THE  OUTPUT  OF  PROGRAM  LP201  TO  ASSURE  PROPER 
EXECUTION  OF  COPY  REPLACING  OF  FD  AND  RELATED  01  ENTRIES  FOR  A 
SEQUENTIAL  FILE. 

was  flagged  by  the  fatal  diagnostic: 

1?08  THIS  COPY  STATEMENT  IS  IN  ERROR. 

By  using  a compiler  option  to  ignore  the  errors,  no  problem  v;as 
presented.  The  programs  compiled  and  executed  successfully. 

B.  Execution: 

No  failures. 
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NUCLEUS  MODULE  Lpvel  1 


i 


NC101  thru  NC108 


A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

NC109 

A.  Compilation: 

No  errors. 

E.  Execution: 

1.  The  statement,  "STOP  OUOTE."  failed  to  display  a quote  mark  (or 
other  character)  on  the  operator's  CRT. 

2.  In  tests  of  the  "DISPLAY"  verb,  whenever  a numeric  data  item  was 
DISPLAYed  and  the  item  contained  a value  whose  representation  within 
the  described  field  would  recuire  a leading  rare,  the  DISPLAY  edited 
the  output  by  suppressino;  the  leadine  zero  and  inserting  an  additional 
space  (reserved  for  minus  sign,  if  required). 

PICTURE  9(10)  VALUE  012?U56789. 

DISPLAYed  as: 

bb123456769 

NC110  thru  NC11? 


A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

NC11H 

A.  Compilation: 

1.  The  following  Data  Division  entry: 

01  PIC-SYMTAX-TEST-19  PIC  AB9. 
was  flagged  with  the  fatal  error: 

2011  AN  ALPHANUMERIC  EDIT  PICTURE  MUST  CONTAIN  AT  LEAST  ONE  -X- 
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AND  -B-,  OR  -X-  AND  -0-,  OR  -X-  AND  OR  -A-  AND  -0-,  OR 

-A-  AND 


By  using  a compiler  option  to  icenore  the  errors,  no  problem  was  pre- 
sented, as  no  program  procedure  references  this  entry. 

B.  Execution: 

No  failures. 

NC1 15  thru  NCI 20 

A.  Compilation; 

No  errors. 

B.  Execution: 

No  failures. 


NC151  thru  NC157 


j A.  Compilation: 

I 

No  errors. 

B.  Execution; 

I No  failures. 


NC158 

A.  Compilation; 

No  errors. 

B.  Execution: 

The  same  two  errors  that  appeared  in  the  execution  of  NC109  appeared 
for  NCI58  also. 


NCI59  thru  NC165 


NUCLEUS  MODULE  Level  2 


5 

NC201  and  NC202  . I 

A.  Compilation: 

No  errors. 

B.  Execution:  I 

i 

No  failures.  1 

i 

NC203 

A.  Compilation: 

1.  In  the  DATE-COMPILED  paragraph  in  the  IDENTIFICATION  DIVISION,  the 
compiler  did  insert  the  current  date,  but  did  not  remove  the  existin'? 
comment-entry  as  required  by  paragraph  2.^.M  on  page  II-14  of  the 
standard. 

B.  Execution: 

No  failures. 

NC20'< 

A.  Compilation: 

No  errors. 

B.  Execution: 

Error  NC109.B.2  (see  NC109)  appeared  for  MC20i*  also. 

NC205  thru  NC218 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 


I 

I 
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RELATIVE  I-O  MODULE  Levfl  1 


RL101  thru  RL109 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

RL151  thru  RL153 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

RELATIVE  I-O  MODULE  Level  2 
RL201  thru  RL205 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 


REPORT  WRITER  MODULE  Level  1 


RW101  thru  RW10U 

A.  Compilation: 
No  errors. 

B.  Execution: 

No  failures. 
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SEGMENTATION  MODULE  Level  1 


I 


SEGMENTATION  MODULE  Level  2 
SG201  thru  50204 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 
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SEQUENTIAL  I-O  MODULE  Level  1 
S0101  thru  SQ110 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

SQ111 

A.  Compilation: 

No  errors. 

B.  Execution: 

1.  The  object  program  hun«:  in  a loop  at  some  point  after  the  eompleticn 
of  CODE-TEST- 1 , at  which  a sequential  file  containing  59?  1 55-character 
records  had  been  created.  This  file  employs  a CODE-SET  clause  in  its 
File  Description  entry  which  is  equated  through  SPECIAL-NAMES  to  the 
STANDARD-1  set.  The  loop  v;as  apparently  encountered  while  attempting 
to  re-OPEN  and  READ  the  file  which  had  just  been  created  and  CLCSEd . 

S0112  thru  S0121 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

S0151  thru  SC153 

A.  Compilation: 

Mo  errors. 


B.  Execution; 

No  failures. 


SEOUEHTIflL  I-O  Level  2 


S0201  thru  S0212 

A,  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

S021?  thru  SQ215 

A.  Compilation: 

No  errors. 

B.  Execution: 

1.  In  these  programs,  which  test  the  LINAGE  clause,  the  LINAGE  values 
were  honored  in  determining  the  number  of  det=il  lines  to  be  printed  on 
each  logical  page,  but  the  LIKES  AT  POTTCM  values  were  ignored  and  the 
logical  page  size  defaulted  to  the  size  of  the  physical  printer  page. 

S0216  thru  SC218 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 
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SORT-MERGE  MODULE  Level  1 


ST101  thru  ST117 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 

SORT-MERGE  MODULE  Level  2 
ST201  thru  ST215 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 


TABLE  HANDLING  MODULE  Level  1 
TH101  thru  TH111 


A.  Compilation: 

No  errors.  ; 

B.  Execution:  ) 

No  failures. 

TH151  and  TH152 

A.  Compilation: 

No  errors. 

E.  Execution: 

No  failures. 

TABLE  HANDLING  MODULE  Level  2 
TH201  thru  TH220 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  failures. 


